5 REM"ADAPTED BY STEVEN DARNOLD, P.O. BOX 201  ALEXANDRA, NEW ZEALAND[141]
8 [151]53280,0:[151]53281,0:[153]"LOAD":D$[178]"T Y P I N G     P R A C T I C E         "
10 [129]I[178]1[164]13[169]3:[151]646,I:[153]:[153]"     ";
12 [129]J[178]1[164][195](D$):[153][202](D$,J,1);:[129]N[178]1[164][187](1)[172]50:[130]N,J,I
14 [153]"LISTLOADRETURN":[156]
16 [134]EX$(60)
18 LN[178]39:SC[178]55296[171]1024
20 OC$[178]"INPUT"
22 T1[178]700
24 [141] 40
26 [141] 252
32 Z1[178]64:R1[178]2
38 [137]190
40 A[178]1064:[134]CL(57)
42 [131]169,258,254,173,92,175,177,179
44 [131]102,181,183,185,262,260,104,106
46 [131]88,94,171,96,100,256,90,252,98,250
48 [129]I[178]1[164]26
50 [135]CL(I):[130]
52 [131]336,256,258,260,176,178,180,96,98,100
54 [129]I[178]48[164]57
56 [135]CL(I):[130]
58 [142]
60 X[178][198](C$)[171]Z1
62 [139]X[178][171]32[137]66
64 Y[178]A[170]CL(X):[137]68
66 Y[178]A[170]339
68 D[178][194](Y[170]SC):[151]Y[170]SC,1:[142]
70 [153]"          SPC(
72 END
74 PRINT"[147]
76 [153]"LOAD
78 PRINT"[151]              "
80 PRINT"               "
82 PRINT" [156] [146]  [146]  [146]  [151]  [156] [146]  [146]  [146]  [151]   "
84 PRINT"              "
86 PRINT"[185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]
88 [142]
90 [153]"LOAD"
92 [153]"                SPC(CLOSESPC(CLOSESPC(CLOSESPC(
94 PRINT"
96 [153]"                SPC(CLOSESPC(CLOSESPC(CLOSESPC(
98 PRINT"
100 [153]" WAIT  WAIT  WAIT SPC(
102 PRINT"
104 [153]"                SPC(CLOSESPC(CLOSESPC(CLOSESPC(
106 PRINT"
108 [153]"                SPC(CLOSESPC(CLOSESPC(CLOSESPC(
110 RETURN
112 PRINT"[154]";EX$(N);"";
114 PRINT"[150]";
116 E=0:C=0:LL=0
118 FORI=1TOLEN(EX$(N))
120 C$=MID$(EX$(N),I,1):L=0
122 GOSUB60
124 T=TI: T2=T1
126 GET D$: IF TI-T > T2 GOTO 132
128 IF D$="" GOTO 126
130 GOTO 142
132 T2=100000
134 PRINT "[154]PRESS [150]F1[154] TO CHECK PROGRESS"
136 GET D$:IF D$="" GOTO 136
138 PRINT"[145]                                     "
140 PRINT "[150][145][145][145][145][145][145][145][145][145]";: FOR KK=1 TO I:PRINT"";:NEXT
142 IF D$=OC$ GOTO 158
144 IFD$<>C$THENE=E+1:PRINT"[214][157][150]";:GOTO126
146 L=TI-T:IFL>300THENL=300
148 LL=LL+L
150 POKEY+SC,D
152 C=C+1:PRINTC$;:NEXT
154 TC=TC+C:TE=TE+E:TL=TL+LL
156 RETURN
158 PRINT"[147]"
160 PRINT"[159]PRESENT DIFFICULTY  =";:IFINT(N/4)<10THENPRINTINT(N/4):GOTO164
162 PRINT" NUMERIC"
164 PRINT:PRINT"CORRECT KEYSTROKES  =";TC
166 PRINT:PRINT"ERROR KEYSTROKES    =";TE
168 IF(TC+TE)=0GOTO172
170 PRINT:PRINT"ERROR/TOTAL         =";INT(TE/(TC+TE)*100);"%"
172 X=INT(TL/60):Y=INT(X/60):X=X-Y*60
174 PRINT:PRINT"KEYBOARD TIME USED  =";Y;"MIN."X;"SEC."
176 IFTL=0GOTO180
178 PRINT:PRINT"WORDS PER MINUTE    ="INT(TC*720/TL)
180 PRINT"[154]PRESS [150]F1[154] TO RETURN TO EXERCISES.
182 [161]D$:[139]D$[178]""[137]182
184 [139] D$[178]OC$ [167] [137] 14
186 [137]182
188 [128]
190 [139]R1[178]1[137]220
192 [141]400:[153]"OPENLEVEL OF DIFFICULTY? (0 TO 9)";
194 [161]D$:[139]D$[178]""[137]194
196 [139] D$ [179][177] "0" [167] [139] [197](D$)[178]0 [137] 194
198 [153][197](D$)
200 N[178]4[172][197](D$)
202 TL[178]0:TE[178]0:TC[178]0
204 [141]74
206 [141]112
208 [139]E[177]2[137]204
210 [139]LL[179]1840[167]N[178]N[170]1:[137]216
212 N[178]N[171]4:[139]N[179]0[167]N[178]0
214 [137]204
216 [139]N[177]LN[167]N[178]LN[171]3
218 [137]204
220 N[178]40
222 TL[178]0:TE[178]0:TC[178]0
224 [141]90:[141]112
226 [139]E[177]2[137]224
228 [139]LL[179]1840[167]N[178]N[170]1:[137]234
230 N[178]N[171]4:[139]N[179]40[167]N[178]40
232 [137]224
234 [139]N[177]47[167]N[178]44
236 [137]224
238 I[178]43:LN[178]11000
240 [153]LN[170]I;"EX$("I")=";
242 [129]J[178]1[164]33
244 [161]D$:[139]D$[178]""[137]244
246 [153]D$;:[130]
248 [153]:I[178]I[170]1:[137]240
250 [128]
252 EX$( 0 )[178]"FJFJFJFJJFJFJFJFFDJKFDJKJKFDJKFD
254 EX$( 1 )="DKDKDKDKKDKDKDKDDSKLDSKLKLDSKLDS
256 EX$( 2 )[178]"SLSLSLSLLSLSLSLSSAKLLKASLKASKLSA
258 EX$( 3 )="FDSAJKLLKJASDFSADJLKJSFLJDAJLFJF
260 EX$( 4 )[178]"SAD ASK LAD ALL DAD FAD ADD LASS
262 EX$( 5 )="FGJHFGJHFGJHFGJHGJHGFHJGFHJGFHJF
264 EX$( 6 )[178]"GAS HAD LAG SAG HAG JAG GAGS LAD
266 EX$( 7 )="HA ADD FADS HAGS SHALL FALL LADS
268 EX$( 8 )[178]"FRDESWAQFTRFEDWSQATREWQASDFREWQA
270 EX$( 9 )="JUKILOPLOIKUJHYUJKILOPLPOLKIUJHY
272 EX$( 10 )[178]"SAWFEDREDFATJUKKILLOPPOKHUGJUGFT
274 EX$( 11 )="TRFDESWQAGYJHUKILOLPOKIUJHGTYRUI
276 EX$( 12 )[178]"FOR THE ITS TWO HIS GOT DUG LOTS
278 EX$( 13 )="SHE ROD OUT YOU ARE LIDS POT SAW
280 EX$( 14 )[178]"SIR FUR HOW TRY HAD RUT RID WEDS
282 EX$( 15 )="DID ROD USE PLY WAYS ALE ATE DOG
284 EX$( 16 )[178]"AZSXDCFVGBHNJMKLJHBNKLOPAWSEDRFT
286 EX$( 17 )="ZASXDCFVGBHNJMKLLKMJNHBGVFDCSXZA
288 EX$( 18 )[178]"ZXCVBNMMNBVCXZFCDXSZAJNKMLHBGVMK
290 EX$( 19 )="LKMJNHBAZSXDCFVGBNJMKLJHNFGVJHBF
292 EX$( 20 )[178]"AND FIX HILL BUY MAN BED NOR END
294 EX$( 21 )="CAN CUT NOW SONS OWN BIG NEW CAR
296 EX$( 22 )[178]"MEW HIM ONE ANY VAN BUT BAD ICES
298 EX$( 23 )="OFF ODD ANN ALL SEE ZOO CAN BACK
300 EX$( 24 )[178]"QAZWSXEDCRFVTGBYHNUJMIKOLPPLOQAW
302 EX$( 25 )="DESWQAIOPJKLLHYTGVBNJUKILOPQAZSX
304 EX$( 26 )[178]"BGVFRDSWAZAQPLMJUOILPLKMJNUTGVAQ
306 EX$( 27 )="ZSERFDVCXZAQJHKMLPOLKIJUHYNTGBAQ
308 EX$( 28 )[178]"THE THAN ABLE VERY GAVE HID COPY
310 EX$( 29 )="MOVE THEN CAM WHEN HAVE SENT POT
312 EX$( 30 )[178]"GIVE THEM TIME TRY BOTH NOT MUCH
314 EX$( 31 )="WANT BEST MAKE TO GO MORE CRY AS
316 EX$( 32 )[178]"TEUPOYQSHGRJWLDAKQTREOUGJHSDFNJK
318 EX$( 33 )="IDPFWAKLPOUTWEYDSAHJKLKIGOROPLQA
320 EX$( 34 )[178]"ATRQJEWLDUYIGKFSHIPOJSUEWTLUONML
322 EX$( 35 )="FRYGADOQHSKARUILQTPDOYWHGKFJECXN
324 EX$( 36 )[178]"OTHER THEIR RYE FIELD NORM RIFLE
326 EX$( 37 )="THINK USUAL WASTE FOR MOVE WOULD
328 EX$( 38 )[178]"MONTH DATE YEAR MINUTE DAY TIMES
330 EX$( 39 )="EARLY DELAY ABOUT AXE QUEER MOAN
332 EX$( 40 )[178]"45645645645646564554645645664546
334 EX$( 41 )="41415252636314412552366345612345
336 EX$( 42 )[178]"50053252036524156365201450025641
338 EX$( 43 )="47475858696974478558966945678945
340 EX$( 44 )[178]"10203014504758695005647586950145
342 EX$( 45 )="12345678900546123475869500145650
344 EX$( 46 )[178]"14150525863696321456563214569874
346 EX$( 47 )="02021233698521474120234569874520
348 [142]
400 [153]"LOADCONTREST YOUR FINGERS ON THE HOME KEYS:
410 PRINT"[156]                        ";
412 PRINT" A  S  D  F  J  K  L  : ";
414 PRINT"                        "
420 PRINT"[154]DO NOT LOOK AT THE KEYBOARD.  KEEP YOUR   EYES ON THE SCREEN.
430 [153]"PRESS DEFF1CONT TO CHECK YOUR PROGRESS.
440 RETURN